Visual Basic Source Code/Visual Basic Source Code.iso/vbsource/health/assess2.frm

Text File | 1993-07-21 | 21KB | 614 lines

VERSION 2.00
Begin Form assess2
   BorderStyle     =   0  'None
   Caption         =   "assess2"
   ClientHeight    =   6915
   ClientLeft      =   135
   ClientTop       =   600
   ClientWidth     =   9495
   Height          =   7320
   Left            =   75
   LinkMode        =   1  'Source
   LinkTopic       =   "Form3"
   ScaleHeight     =   6915
   ScaleWidth      =   9495
   Tag             =   "diagnosis"
   Top             =   255
   Width           =   9615
   Begin SSFrame Frame3D1
      Alignment       =   2  'Center
      Caption         =   "IN CASE OF EMERGENCY NOTIFY"
      Font3D          =   2  'Raised w/heavy shading
      FontBold        =   0   'False
      FontItalic      =   0   'False
      FontName        =   "MS Sans Serif"
      FontSize        =   13.5
      FontStrikethru  =   0   'False
      FontUnderline   =   0   'False
      ForeColor       =   &H00000000&
      Height          =   6945
      Left            =   0
      TabIndex        =   8
      Top             =   -15
      Width           =   9495
      Begin AniPushButton AniButton2
         BackColor       =   &H00FFFFFF&
         Height          =   480
         Left            =   4575
         PictDrawMode    =   1  'Autosize control
         Picture         =   ASSESS2.FRX:0000
         Speed           =   162
         TabIndex        =   12
         TextPosition    =   2  'Left
         Top             =   6450
         Width           =   480
      End
      Begin AniPushButton AniButton1
         BackColor       =   &H00C0C0C0&
         Caption         =   "Back Page"
         Height          =   465
         Index           =   1
         Left            =   540
         Picture         =   ASSESS2.FRX:05E2
         Speed           =   162
         TabIndex        =   20
         TextPosition    =   1  'Right
         Top             =   6405
         Width           =   1515
      End
      Begin AniPushButton AniButton1
         BackColor       =   &H00C0C0C0&
         Caption         =   "Next Page"
         Height          =   465
         Index           =   0
         Left            =   6930
         Picture         =   ASSESS2.FRX:148E
         Speed           =   162
         TabIndex        =   21
         TextPosition    =   2  'Left
         Top             =   6315
         Width           =   1440
      End
      Begin PictureBox Picture4
         Height          =   3120
         Left            =   0
         ScaleHeight     =   3090
         ScaleWidth      =   9465
         TabIndex        =   13
         Top             =   3150
         Width           =   9495
         Begin PictureBox Picture5
            BackColor       =   &H00C0C0C0&
            Height          =   3090
            Left            =   0
            ScaleHeight     =   3060
            ScaleWidth      =   9465
            TabIndex        =   14
            Top             =   0
            Width           =   9495
            Begin AniPushButton AniButton3
               BackColor       =   &H00C0C0C0&
               Cycle           =   2  '2-state 1/2 & 1/2
               Height          =   480
               Index           =   1
               Left            =   8715
               PictDrawMode    =   1  'Autosize control
               Picture         =   ASSESS2.FRX:233A
               TabIndex        =   25
               Top             =   2535
               Width           =   480
            End
            Begin VHedit HEdit3
               FontBold        =   -1  'True
               FontItalic      =   0   'False
               FontName        =   "MS Sans Serif"
               FontSize        =   18
               FontStrikethru  =   0   'False
               FontUnderline   =   0   'False
               Height          =   2505
               InflateBottom   =   270
               InflateLeft     =   270
               InflateRight    =   270
               InflateTop      =   270
               Left            =   -30
               TabIndex        =   19
               Top             =   -15
               Version         =   268435458
               Width           =   9510
            End
            Begin Label Label3
               Alignment       =   2  'Center
               BackColor       =   &H00C0C0C0&
               Caption         =   "Touch here for more room"
               FontBold        =   -1  'True
               FontItalic      =   0   'False
               FontName        =   "MS Sans Serif"
               FontSize        =   9.75
               FontStrikethru  =   0   'False
               FontUnderline   =   0   'False
               Height          =   255
               Left            =   90
               TabIndex        =   15
               Top             =   2700
               Width           =   3375
            End
         End
      End
      Begin PictureBox Picture2
         BackColor       =   &H00C0C0C0&
         Height          =   2400
         Left            =   5535
         ScaleHeight     =   2370
         ScaleWidth      =   3945
         TabIndex        =   10
         Top             =   375
         Width           =   3975
         Begin VBedit BEdit2
            BackColor       =   &H00FFFFFF&
            CellHeight      =   480
            CellWidth       =   320
            CharSet         =   16404
            CombBaseLine    =   390
            CombEndHeight   =   350
            CombEndMarker   =   0   'False
            CombHeight      =   250
            FontBold        =   0   'False
            FontItalic      =   0   'False
            FontName        =   "MS Sans Serif"
            FontSize        =   18
            FontStrikethru  =   0   'False
            FontUnderline   =   0   'False
            Height          =   735
            Index           =   1
            InflateBottom   =   180
            InflateLeft     =   180
            InflateRight    =   180
            InflateTop      =   240
            InkWidth        =   2
            Left            =   0
            TabIndex        =   3
            Top             =   1605
            Version         =   268435458
            Width           =   3900
         End
         Begin VHedit hedit2
            Enabled         =   0   'False
            FontBold        =   -1  'True
            FontItalic      =   0   'False
            FontName        =   "MS Sans Serif"
            FontSize        =   18
            FontStrikethru  =   0   'False
            FontUnderline   =   0   'False
            Height          =   525
            Index           =   1
            InflateBottom   =   270
            InflateLeft     =   270
            InflateRight    =   270
            InflateTop      =   270
            Left            =   1635
            TabIndex        =   7
            Top             =   1350
            Version         =   268435458
            Visible         =   0   'False
            Width           =   1500
         End
         Begin VBedit BEdit2
            BackColor       =   &H00FFFFFF&
            CellHeight      =   480
            CellWidth       =   320
            CharSet         =   16404
            CombBaseLine    =   390
            CombEndHeight   =   350
            CombEndMarker   =   0   'False
            CombHeight      =   250
            FontBold        =   0   'False
            FontItalic      =   0   'False
            FontName        =   "MS Sans Serif"
            FontSize        =   18
            FontStrikethru  =   0   'False
            FontUnderline   =   0   'False
            Height          =   735
            Index           =   0
            InflateBottom   =   180
            InflateLeft     =   180
            InflateRight    =   180
            InflateTop      =   240
            InkWidth        =   2
            Left            =   45
            TabIndex        =   2
            Top             =   450
            Version